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Abstract 



We show that the question whether a term is typable is decidable for type sys- 
tems combining inclusion polymorphism with parametric polymorphism provided 
the type constructors are at most unary. To prove this result we first reduce the 
typability problem to the problem of solving a system of type inequations. The 
result is then obtained by showing that the solvability of the resulting system of 
type inequations is decidable. 



1 Introduction 



As a common agreement, a flexible type system needs to contain inclusion as well 
as parametric polymorphism. Unfortunately, such a flexibility of the type system 
causes type inference to become hard or even undecidable. In this paper, we in- 
vestigate the problem of checking the well-typedness of terms in the presence of 
inclusion polymorphism combined with parametric polymorphism. We show that 
in this case typability is decidable, provided that the type constructors are at most 
unary. This result has not been stated before. 

The result of our paper can be used for the design of new type systems that 
combine both inclusion polymorphism and parametric polymorphism. Type systems 
of this kind are of interest for object-oriented programming languages. In particular, 
our result is applicable for the programming language Java which up to now does 
not allow for parametric polymorphism but will probably do so in future versions 
| MBL97t|OW97| . 

Another area where our result is applicable is logic programming. A number of 
type systems have been designed in this area, e. g. ]AM94| , [HT92| , |Pfe92| , |YFS92J , 
but the systems that have been implemented so far either offer no inclusion poly- 
morphism at all [HL94, SHC95| or impose stronger restrictions [Bci95b| than a type 
system that would be based on our result. 

As it stands, our result cannot be applied to functional programming languages 
because these languages allow for the binary type constructor — ► which takes two 
types a and r and returns the type a — > r of all functions mapping a to r. 

In general, Tiuryn and Urzyczyn have shown that type inference for a type 
system which combines inclusion polymorphism and parametric polymorphism is 
undecidable for second-order types TU96|. On the other hand, type inference 
for inclusion polymorphism combined with miliary type constructors is decidable: 



Mit84, Mit91] presents an algorithm called MATCH, which solves type inequations 
in the case that only in equations between miliary type constructors are allowed. 
Fuh and Mishra [ FM9C ] introduce a similar algorith m to solve the same problem. 
The logic programming language Protos-L | Bci95a | is based on this type system. 
This paper is organized as follows: Section [2| contains a definition of the type 
language. In section || we define well-typed terms. Moreover, we show how the 
question whether a term is well-typed can be reduced to the problem of solving a 
system of type inequations. The solvability of these systems is shown to be decidable 
in section H[ Section || concludes. 



2 Type Language 



In this section we first introduce a language for describing types. Since types behave 
in many ways like terms, there is also a notion of substitution. This notion is defined 



in subsection 2.2 



2.1 Types 

Types are constructed from type constructors and type parameters. The set of type 
constructors is partially ordered. This ordering is extended to types. 



Definition 1 (Ordered Type Alphabet) An ordered type alphabet is a tuple 
2l=(-A,#,<) such that 

1. The type alphabet A is a finite set of type constructors. Elements of A are 
denoted by K, L, M, ■ ■ ■ . 



2- (A, <) is a partial order. 

3. ■#■ : A — > N is a function assigning an arity, #K, to every type constructor 
K eA. o 



Definition 2 (Types) To define types, we assume that an ordered type alphabet 
21 = (A, #, <) and a set Cp = {a^ : i G N} of type parameters are given. Then the 
set of types T = T(2l, ^3) is defined inductively: 

• a G T for all a G <}3. 

• If iiT G .4, ^iC = n, and ct^ G T for all i = 1, . . . ,n, then if(<7i, . . . , c„) G X. 

If #if = 0, then we write K instead of K(). o 

Types are denoted by ir, g, a, and r, while parameters are denoted by a and /?. A 
monotype is a type constructed without type parameters. If r is a type, then Par(r) 
denotes the set of type parameters in r. 

Next, we extend the relation < from 21 to the set of types X(2l, ^3). 

Definition 3 (Subtype Relation) Let 21 = (A, #, <) be an ordered type alpha- 
bet and let 1(21, ?P) be the set of types constructed from 2t. Then the subtype 
relation on T(2l, ^3) is defined inductively: 

1. If a G *P, then a < a. 

2. If K, L G A, #K = to, and ^L = n, then K(cr\, . . . , <J m ) < L(t\, . . . ,t„) 
holds iff K < L and Oi < r, for all i = 1, . . . , min(TO, n). o 

Without further provisons, (X, <) is not a partial order. This is shown by the 
counter example given next. 

Example 1 Assume that A = {K\,K2,L\,L2} where #-?Q = and #Lj = 1 for 
i = 1,2. The ordering < on A is defined by the following chain of inequations: 

Li<K 1 <K 2 < L 2 . 

Then we have Li(K 2 ) < K x and K x < L 2 (K 1 ). However, L X {K 2 ) £ L 2 {K{). o 

This problem is caused by an incompatibility between the arity function ■#■ : A — > N 
and the ordering of the type alphabet. 

Definition 4 (Compatible) Assume a type alphabet 21 = (A,#,<) is given. 
Then the arity # : A — > N is compatible with the ordering < iff the following 
condition is satisfied for all type constructors K, L, and M: 

K<LAL<M^> min(#iir, #M) < #L. o 

Convention: For the rest of this paper we assume the following: If an ordered 
type alphabet (A, #, <) is given, then # is compatible with <. 

Lemma 1 If 21 = (A, #, <) is an ordered type alphabet, then (X(2l, ^3),<) is a 
partial order. 

Proof: We need to show that the relation < is reflexive, antisymmetric, and tran- 
sitive. In order to prove the reflexivity, we have to show a < a for all types a. This 
is done via a trivial induction on a. To prove the antisymmetry, assume a < r and 
t < a. We have to show a = r. The proof proceeds by induction on a. 



1. a is a parameter a. Because of a < r we know that r = a. 

2. cr = L{ai, . . . , cr/). Then r = M(ti, . . . , r m ) and we must have L < M and 
M < L. Since < is a partial order on A, we have L = M and I = m. Further, 
we have 

<?» < T i f° r all i = 1, . . . , I, and 

Ti < <jj for all i = 1, . . . , Z. 

The induction hypothesis yields (Ti = Tj for all i = 1, . . . , I and then cr = t is 
immediate. 

To prove the transitivity, assume that g,o~,T £ T(2t, ^3) are given such that g < a 
and a < t. We need to prove g < r. The proof proceeds by induction on cr. 

1. a is a parameter a. Then g is a and, similarly, r is a. Obviously g < r. 

2. cr is £(<7i,... ,<7;). Then p = ^(gi,... , g fe ) and r = M(ti,... ,t to ). The 
assumption g < a yields K < L and 

ft < Ci for all i = 1, . . . , min(fc, I) 

and, similarly, the assumption a < r yields L < M and 

Cj < 7"i for all i = 1, . . . , min(7, m). 

Since < is a partial order on A, we have K < M. Further, the induction 
hypothesis shows that 

Qi < Ti for all i — 1, . . . , min(fc, I, m). 

Since the arity =#= is compatible with <, we have min(fc,r7i) < I. Therefore, 
min(fc, I, m) = min(fc, m). But then g < r is immediate. □ 

2.2 Parameter Substitutions 

Types behave in many ways like terms. Therefore there is also a notion of substi- 
tution. Since type parameters are substituted rather than variables, these substi- 
tutions are called parameter substitutions. Parameter substitutions are denoted by 
the capital Greek letters 0, $, and ^. 

Definition 5 (Parameter Substitution) A parameter substitution 8 is a finite 
set of pairs of the form 



[ai i-> ti,. 



, L4. n i ' / n 



where ai, . . . , a n are distinct parameters and t\, ..,t„ are types. It is interpreted 
as a function mapping type parameters to types: 

@(a) ■= { Ti if a = ail 
\ a otherwise. 

This function is extended to types homomorphically: 

Q(F(a u ...,a n )) := F(@(a 1 ), . . . ,@(a n )). 

We use a postfix notation to denote the result of evaluating on a type r, i.e. we 
write r© instead of 0(r). 

The domain of is defined as dom(0) := {a \ a ^ a©}. The set of parameters 
appearing in the range of a parameter substitution $ is defined as 

Par($) := |J{Par(a$) I a G dom(&)}. 
A parameter substitution is called a parameter renaming iff it has the form 



[ax ^ a ff (i) , . . . ,a n i-> a l(n) ] 

where it is a permutation of the set {1, . . . , n}. 

If 0i and ©2 are parameter substitutions, then their composition ©i o @ 2 is 
defined such that a(@i o 2 ) = (061)82 holds for all type parameters a. o 

Parameter substitutions respect the ordering < on 1. 

Lemma 2 If 9 is a parameter substitution and a, r g T, then 

cr < t =>• cr9 < r0. 
Proof: The proof is done by an induction following the definition of a < r. 

1. The case a < a is obvious. 

2. If cr = K(o~i,... ,o~ m ) < L{t\, . . . ,t„) = t, then K < L and er^ < r, for 
i = 1, . . . , min(m,?i). Using the induction hypothesis we have er^O < TjB for 
all relevant i. Therefore K{a\Q, . . . , a m Q) < L(ti0, . . . , r„6). o 

3 Well- Typed Terms 

We define the set of well-typed terms in the first subsection. Then in subsection |3.2| 
we reduce the question whether a term is well-typed to the solvability of a system 
of type inequations. 

3.1 Definition of Well- Typed Terms 

We assume a set of functions symbols T and a set of variables V to be given. Every 
function symbol / G T is supposed to have an arity. 

Definition 6 (Terms) The set of terms T(J r , V) is defined inductively: 

1. If we V, thenve T{F,V). 

2. If / e S, / is n-ary, and t x , . . . , t» e T{T, V), then f(t u ... ,t n )e T{F, V). 

The set of variables occurring in a term t is defined by an obvious inductive definition 
and denoted by Var(i). If this set is empty, then t is called a closed term. The set 
of closed terms is denoted by T(T). o 

Definition 7 (Signature) If / is n-ary, then its signature is a string of n+1 types. 
If <7i . . . a n r is the signature of /, then this is communicated by writing 

/ : <7i x . . . x a n -> t. 

In the following, we assume that every function symbol / has a signature. 
A signature Q\ . . . g n -K is appropriate for a function symbol / iff 

/ : (j\ X . . . X a n — ► t 

and there exists a parameter substitution such that 7r = r0 and qi — ctj0 for 
i = 1, . . . , n. o 

Definition 8 (Type Assignment) A type annotation is a pair written as t : r 
where £ is a term and r is a type. The type annotation t : r is called a variable 
annotation if t is a variable. If T = {xi : Ti, . . . ,x„ : t„} is a finite set of variable 
annotations such that the variables x» are pairwise distinct, then we call T a type 



assignment. If T = {xi : n, . . . ,x n : r n } is a type assignment, then we regard T 
as a function with domain {x\, . . . , x n } mapping the variables Xi to the types r», 
i.e. we have r(xj) = Tj for i = 1, . . . , n and dom(r) = {xi, ... ,s„}. o 

Definition 9 (Well- Typed Term) The notion of a well-typed term is defined via 
a binary relation h taking as its first argument a type assignment and as its second 
argument a type annotation. The definition of h is done inductively: 

f. If T(x) < 7r, then 

T h i : 7T. 
2. If we have 

(a) r h s, : Qi for all i = 1, . . . , n, 

(b) <7i x . . . x <7„ — ► r is appropriate for /, 

(c) Qi < <7i for all i = 1, . . . , n, and 

(d) T < 7T, 

then r h /(si, . . . , s n ) : 7r. 

A term £ is well-typed iff there exist a type assignment T and a type r such that 
r h t : t. We read f h t : t as 'T entails t : r" . We call T h t : t a type judgement. 



3.2 Type Checking 

In this subsection, we reduce the question whether a term is well-typed to the 
solvability of a system of type inequations. Here, a type inequation is a pair of 
types written as a -< r. A parameter substitution solves a type inequation a <t 
(denoted |= a ■< r) if <70 < t0. A system of type inequations is a set of type 
inequations. A parameter substitution solves a system of type inequations X 
(denoted © \= X) iff 8 solves every type inequation in X. 

Assume that T is a type assignment and t : r is a type annotation such that 
Var(t) C dom(r). Wc define a function ineq(r,£ : r) by induction on i such that 
ineq(r, t : r) is a system of type inequations. A parameter substitution will solve 
ineq(r, t : r) iff T0 h t : r0. The inductive definition of ineq(r,t : r) is given as 
follows: 

1. incq(r,a; : r) := {T(x) < r} 

2. Assume the signature of / is given as / : o\ x . . . x a, n — > a, where the type 
parameters have been appropriately renamed so that they are new, i.e. the 
new parameters may occur neither in T nor in r nor in any of the signatures 
used to construct fneq(r, Si : o~i) for some i = 1, . . . , n. Then 

n 

ineq(r, f(s 1 , ... ,s n ) :t) := {(T^t}U|J ineq(r, s, : (Tj). 

Before starting with the proofs of the soundness and completeness for the above 
transformation, we state some definitions: If T is a type assignment and t : r is a 
type annotation, then T > t : t is called a hypothetical type judgement. A parameter 
substitution solves a hypothetical type judgement r > t : r iff T0 h i : r0 holds. 
A type constraint is either a type inequation or a hypothetical type judgement. A 
parameter substitution solves a set of type constraints C iff it solves every type 
inequation and every hypothetical type judgement in C . This is written (= C . 
We define a rewrite relation on sets of type constraints. It is the least transitive 
relation ^> such that: 



1. C U {r > x : r} ~> C U {T(x) < r} 

2. Assume that the signature of / is given as / : o\ x • • • x <j n — > a where the type 
parameters have been appropriately renamed so that they are new. Then 

C U {r > /(«!, . . . , a„) : r} ~» C U {a r< r} U (J™=i{r > «< : a*}. 

If a hypothetical type judgement r>£ : r is given, then the two rewrite rules can be 
used repeatedly until the set ineq(r, t : r) is derived. This is easily seen by induction 
on t. Furthermore, the rewrite relation ~> satisfies the following invariants: 

1. (6 h C 2 ) A (Ci ~> C 2 ) =► (9 h Ci) (Ii) 

2. (6 h Ci) A (Ci ~» C 2 ) =* 3*. (9 C * A tf |= C 2 ) (I 2 ) 

Before proving these invariants, we show that they suffice to verify the soundness 
and completeness of our transformation. 

Theorem 1 (Soundness of the Transformation) Assume T is a type assign- 
ment and t : r is a type annotation. If 9 |= ineq(T, t it), then T9 h t : r0. 

Proof: Since the assumption is 9 |= ineq(T, t : r) and we know that {Tot : t} ~~» 
ineq(r, t : r), the invariant (Ii) shows that 9 |= {T > t : r}. By definition, this 
implies r9 h t : tQ. □ 

Theorem 2 (Completeness of the Transformation) Assume T is a type as- 
signment, t : t is a type annotation, and 9 is a parameter substitution such that 
T9 h t : tQ. Then, 9 can be extended to a parameter substitution $ that is a 
solution of ineq(T, t : r). 

Proof: re h t : t9 implies (= T > t : r. Since {T>t : t} ~» ineq(r, i : r), the 
invariant (I 2 ) shows that 9 can be extended to a parameter substitution $ such 
that $ |=ineq(r,i:-r). □ 

Proof of (Ii): According to the definition of the rewrite relation ~», it suffices to 
consider the following two cases: 

1. C\ = CU{r>a; : r} ~> CU{r(a;) < r} = C 2 . The assumption is that 9 |= C 2 . 
Then 9 h C and r(ar)9 < T0. Therefore, T9 h x : r9 showing 9 (= C x . 

2. d = C U {r > f(s u . . . , s n ) ■ r} ~> C U {a ^ r} U U2=i{ r > s 2 : a;} = C 2 , 
where / : <7i X • • • <j n — ► cr. According to the assumption, we have 9 |= C, 
<t9 < r0, and 9 |= T > s, : <Tj for i — 1, . . . , n. Then T9 h s$ : (7^0 for 
i = 1, . . . , n. Therefore, T9 h /(si, . . . , s n ) : r9 and that yields the claim. 

□ 

To prove the invariant (I 2 ) we need the following lemma, which follows directly 
from Defs. and ^. 

Lemma 3 Suppose that t — / (si, . . . , s n ) and / : <j\ x • • • x a n — » a . Then 
r h t : t iff there is a parameter substitution 9 such that ct9 < r and r h s, : ct^9 
for all i = 1, . . . ,?i. 

Proof of (I 2 ): Again, it suffices to consider the following two cases corresponding 
to the definition of the relation ~k 

1. C\ = CU{ri>a; : r} ~» CU{r(ir) ^ r} = C 2 . The assumption is that |= C\. 
Then 9 (= C and T9 h x : t0. Therefore, r(x)0 < r0. Define * := 9. 



2. C 1 = CU{r>/(si,... ,s n )-.T}^Cu{a^T}U\Jl =1 {T>s i :a i } = C 2 , 
where / : <7i x • • • a n — ► a. W.l.o.g. we assume that the type parameters 
occurring in this signature do not occur in dom(O), since the type parameters 
in the signature can be renamed. According to our assumption, we have |= 
C and 6 |= {r > /(si, . . . , s n ) : r}. The latter implies TO h f($i, ■ ■ ■ , s„) : 
T0. Lemma shows that there is a parameter substitution $ such that 
TO h Si : cri<I> for all i — 1, ...,n and cr$ < r0. We can assume that 
dom(<I>) contains only type parameters occurring in the signature of /. Then 
dom(O) n dom(&) = 0. Define *:=9U$. □ 

When checking whether a term t is well-typed we want to compute a type 
assignment T and a type r such that T \- t : t holds. To this end, we define a 
most general type assignment T; n it and a most general type Ti n i t : Let Var(t) be the 
variables in t. Define T; n it = \J x ^.y at n\{x : a x } and Tj n i t = a where a x and a are 
distinct new type parameters. The claim now is that t is well-typed if and only if 
the set of type constraints ineq(Ti n i t ,t : Ti n i t ) is solvable. 

Proof: "=>": Assume t is well-typed. Then there exists a type assignment T 
and a type r such that r h t : r. Define a parameter substitution by setting 
0(ckx) = r(x) for x G Var(t) and 0(a) = r. Then we have r(x) = ri n it(x)0 and 
t = Tinit0 and therefore |= {Tinit > t : Ti n it}- Since 

{Ljnit > t : t) ~> ineq(r in it, t : r in i t ) , 

the invariant (I 2 ) shows that there exists a parameter substitution ^ such that 

* |= ineq(r init ,i : r in it). 

"<=": On the other hand, if \E r [= ineq(Ti n i t ,£ : r in it), then Theorem [l] shows that 
Tinit* r- t : Tjnit* holds. □ 

Therefore, the problem whether a term t is well-typed is reduced to the problem 
of solving systems of type inequations. 

4 Solving Systems of Type Inequations 

In this section, we assume that type constructors are at most unary, i.e., given an 
ordered type alphabet 21 = [A, #, <) we have that #K < 1 for all KgA We show 
that then it is decidable whether a system S of type inequations is solvable. To 
this end we present an algorithm which effectively tests all possible instantiations 
for the type parameters in the type inequations. The fact that the type construc- 
tors are at most unary enables us to guarantee three important properties during 
this instantiation process: We do not create any additional parameters; we do not 
increase the overall number of inequations; and the depth of the terms in the type 
inequations does not increase. Therefore we can generate only finitely many sys- 
tems of instantiated type inequations. If one of these systems is solvable, then we 
can construct a solution for S. 

4.1 Some Definitions 

We start with some definitions necessary to formulate the algorithm for checking 
the solvability of systems of type inequations. 

4.1.1 Solvability and Equivalence of Type Inequations 

A system of type inequations X is solvable (denoted OX) iff there is a parameter 
substitution $ such that $ |= X. Two type inequations I\ and Ii are equivalent 
(denoted 1\ k, I 2 ) iff a parameter substitution $ solves I\ if and only if 4> solves I 2 - 



A type inequation / is equivalent to true (denoted / rs true) iff every parameter 
substitution solves 7, it is equivalent to false (denoted I « false) iff no parameter 
substitution solves /. Two systems of type inequations I\ and 2"i arc equivalent 
(denoted X\ ~ I2) iff a parameter substitution <I> solves X\ if and only if <I> solves 
22: 

Xi « x 2 44 v$ • ($ h ^i ^ * h £0 

Next, a system of type inequations X is equivalent to a set of systems of type 
inequations 3 (denoted I«3) iff X is solvable if and only if there is a system J <G 3 
such that J is solvable: 

j«j44 (oz^aje j-oj). 

To proceed, we define the depth of a type inductively: 

1. dcpth{a) := for all type parameters a. 

2. dcpth(K) := 1 for all miliary type constructors K. 

3. depth(K(a)) := l + dcpth(a). 

The depth of a type inequation is defined by taking the maximum: 

depth(o~ <t) := max(depfch(cr) , depth(r)) . 

Furthermore, we define depfch(true) := dcpth{± alse) := 0. The function depth is 
then extended to systems of type inequations: 

depth(I) := max{ dcpth(I) \ I e l). 

The depth of a parameter substitution $ is defined as 

depth(<&) := max{ depth(a<&) | a e dom(<I>)}. 

We define the depth of the empty parameter substitution as 0. A system of in- 
equations X is solvable at depth k (denoted O^Z) iff there is a closed parameter 
substitution $ such that $ |= X and depfch($) < k. 

4.1.2 Definition of nf 

The function nf takes a type inequation as input and either produces an equivalent 
type inequation or yields true or false. The function is defined inductively. 

1. nf(a ^ a) := a <a and nf(a ;< a) := a < a for every type parameter a. 

2. nf{K^L) := ( *™ ^^5 

v — ' false else. 



3. nf(K < L{t)) := 

4. nf^cr) r< £) := 

5. nf(K(a) ^ L{t)) 



true iff K < L; 

false else. 

true iff K < L; 

false else. 



nf(er ^ r) iff if < L; 
false else. 



It is easy to see that nf{I) « I holds for every inequation I . We extend the function 
nf to systems of type inequations. First, we define an auxiliary function nf auyi : 



nf aux (X) := {nf(I)\I el Anf(I)^ true}. 
Then, the function nf(X) is defined as 

{false} if f alse £ nf aux (I); 



1 nf aux (X) otherwise. 
It is easy to see that X w nf{X) for any system of type inequations I. 

4.1.3 Definition of AllParSubst 

Next, we define the function AllParSubst. The input to AllParSubst is a finite set 
A of type parameters. The output is the set of parameter substitutions $ such 
that dom(<I>) C A, depth($) < 1, and Par(a$) C {a} but a$ ^ a for all a £ A. 
Therefore, AUParSubst(A) is equal to the set 

{$ | dom(§) C A A dcpth($) < 1 A Va £ A-Par(a$) C {a}Aa$ ^ a}. 

The function AllParSubst has the following properties: 

1. AllParSubst(A) is finite. 

This is true because the type alphabet is assumed to be finite. Therefore, 
given a finite set A of type parameter there are only finitely many types r 
such that depth(r) < 1 and Par(r) C A. But then AllParSubst(A) must be 
finite, too. 

2. If \& is a parameter substitution such that depfch^) = n > 1 and Par(^) = 0, 
then there exist parameter substitutions <I>i and $2 such that 

(a) $! G AJiParSubst(dom(tf)), 

(b) depth(<& 2 ) =n—l, and 

(c) $ = $1 o$ 2 - 

To prove this, assume "J = [ai 1— > n, . . . , a n *— > T n ]. For those Ti such that 
dcpth(Ti) > 1, we must have tj = Li (en) for some type constructor i, and 
some type ct^ with depth(ai) < depthfa). W.l.o.g. assume that depth(Ti) < 1 
for alH = 1, . . . , m — 1 and dcpth(Ti) > 1 for all i = m, . . . , n. Then define 

$1 := [ai !->• n, . . . , a m _i i-> r m _i, a m h^ L m (a m ), ... ,a„H in(a n )] and 
$2 := [a™ !-> o- m , • • ■ , a» >-> cr„]. 

Then the claim is obvious. 

3.1si {Z$ I $ G AllParSubst(Par(l))} . 

Assume $ |= X where w.l.o.g. dom(<I>) C Par{X). Then the previous property 
shows that $ can be written as $1 o$ 2 where $1 £ AUParSubst(Par(X)^) . But 
then $ 2 \=1<&i. 

Conversely, if * |= J$ for a substitution $ e AUParSubst(Par(X)) , then 
$ o * |= J. 

4. If $ e Al/ParSubst(Par(X)) , then dcpth(nf(J$))< dcpth(X). 

Assume a ;< r is an inequation in X of maximal depth. First, assume a = 
K(a') and r = L(t'). When going from X to nf(X$) this inequation either 
disappears or it has the form niya'Q < t'$). But the depth of this inequation 
is not greater than the depth of the original inequation. 

Next, a = a for a parameter a and r = L(t'). But then cr$ must have 
cither of the forms K or K(a'). When going from X to nf(X&) the inequation 
cr ^ r either disappears or it has the form nf(a'$ ^ t'$). Again the depth of 
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this inequation is not greater than the depth of the original inequation. The 
remaining cases are similar. 

4.1.4 Definition of Inst 

The function Inst transforms a single system of type inequations into an equivalent 
set of systems of type inequations. It is defined as 

Inst(l) := {nf(X$) | $ £ AUParSubst(Par(X)) A nf(X<S>) ^ {false}}. 

The function Inst has the following properties: 

1. Inst(X) is finite. 

2. X w Inst(X). 

3. If Ofcl and k > 1, then there is a J7 £ Inst(X) such that Ok-iJ ■ 

4. If OfcJ and J e Inst(X), then O fc+1 J. 

5. If J e Inst(I), then Par(J) C Par(J). 

6. If J e Inst(X), then depth(J) < depth(I). 

These properties are immediate consequences of the definition of Inst and the prop- 
erties of the function AUParSubst. 

4.2 Deciding Type Inequations 

We present an algorithm for solving (or refuting) systems of type inequations. The 
algorithm maintains two sets of systems of inequations. Call theses sets 971 and 
21. 971 serves as a memory of systems of type inequations that have already been 
encountered, while 21 contains systems of type inequations that can be derived from 
X by application of the function Inst. The algorithm initializes both 971 and 21 to the 
singleton {X}, where X is the system of type inequations that is to be solved. After 
this initialization, the algorithm enters a loop. In this loop, we compute Inst{J) 
for all J £ 21. Then, we update 21 as follows: 

21 := \J{lnst(J) Je%} -971 

that is, we apply Inst to all systems in 21 and we discard those systems that appear 
already in the memory 971. If G 21, then X is solvable and the algorithm halts 
with success. If 21 becomes empty, the algorithm halts with failure. Otherwise, we 
update 971 as 

971 := 971 U 21 

and reenter the loop. Figure |l] specifies the algorithm formally. 

Lemma 4 (Termination) The algorithm given in Figure |l| terminates. 

Proof: For every system of inequations J £ 97t the number of inequations in 
J is less or equal than the number of inequations in X, Par(J') C Par(X), and 
depth(J') < depth(X). Since the type alphabet is finite, the size of 97t must therefore 
be bounded. 

Now assume the algorithm given in Figure [j] does not terminate. Then the set 
2l n +i can never be empty. Therefore, every time the loop is executed, the statement 
971 := 971 U 2l„+i increases the number of elements of the set 971. But then the size 
of 971 would increase beyond every bound. □ 
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end-if; 










an : = 


= SDtUSUi; 










n := 


n + 1; 










goto 


Loop; 









Figure 1: An algorithm for deciding solvability of type inequations. 

Lemma 5 (Soundness) Assume n, k £ N, J £ 2l n and Ofc J . Then <>k+ n 1. 
Proof: The proof is given by induction on n. 

1. n = 0: Since 2lo = {%} we must have J — T and the claim is trivial. 

2. n — ► n + 1: Assume J £ 2l„+i with 0/.J '. Then there is a K, £ 2l„ such that 
J £ Inst(IC). This implies Ok+ilC. By i.h. we have 0^+i)+ n ^- a 

Lemma 6 Assume that O^Z and fc is minimal with this property. Then for all 
n < k there is a J £ 2l n such that <>k- n J- 

Proof: The proof is done by induction on n. 

1. n = 0: Obvious. 

2. n —* n + 1: Assume O^X and that fc is minimal with this property. By 
i.h. there is a J £ 2l„ such that <>k-nJ ■ Then there is a K. £ Inst(J) such 
that Ofc-n-i/C. Assume K £ 9Jt. Since 

n 

an = U su, 

there is an i < n such that K, £ 21,. Therefore Lemma | shows Ofc_„_i + iZ. 
Since k — n — I + i < k this contradicts the minimality of k. This shows 
that the assumption K. £ 971 is wrong and we have K, £ 2t n +i. Because of 
O fc _( n+1 )/C the proof is complete. □ 

Theorem 3 The algorithm given in Figure is correct. 

Proof: Assume that I is solvable. Then O n Z for some n £ N. By Lemma o we find 
& J £ 2l n such that <>qJ holds. But then J = and the algorithm returns true. 
Assume now that X is not solvable. If the algorithm would return true, then 
£ 2l n for some bgN. Since Oo0 Lemma N would then give O n 2\ Therefore the 
algorithm cannot return true. Since it terminates, it must return false. □ 
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5 Conclusion 

In this paper we have presented a type system that supports both inclusion poly- 
morphism and parametric polymorphism. We were able to prove that for this type 
system typability is decidable, provided we use at most unary type constructors. 
In practice, many interesting type constructors are either miliary or unary. Unary 
type constructors occur naturally when dealing with container types, e. g. types 
that are interpreted as sets, lists, or bags. It is convenient to be able to cast, for ex- 
ample, lists to sets. This cannot be done with the type system proposed by Mitchell 



Mit84], but is possible with the type system introduced in this paper. 



Previously, it has been know that type inference is decidable for a system that 



restricts inclusion polymorphism to miliary type constructors [ FM9C , Mit84 , Mit91 ] 



On the negative side, Tiuryn and Urzyczyn [TU96| have shown that the type infer- 
ence problem for second-order types is undecidable. We have shown in this paper, 
that typability is decidable for type systems with at most unary type constructors. 
It is still an open question whether typability is decidable in the case of binary type 
constructors. 

Acknowledgement: The authors would like to thank Pawel Urzyczyn for pointing 
out some technical weaknesses in an earlier version of this paper. 
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